Visual Basic Controls/Visual Basic Controls.iso/vbcontrol/slock/slockfrm.dfm/slockfrm.txt

Text File | 1998-09-28 | 5KB | 223 lines

object frmMain: TfrmMain
  Left = 263
  Top = 124
  BorderStyle = bsSingle
  Caption = 'Test SLock'
  ClientHeight = 194
  ClientWidth = 388
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = mnuMainMenu
  Position = poScreenCenter
  Visible = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object btnRegister: TButton
    Left = 304
    Top = 8
    Width = 75
    Height = 25
    Caption = '&Register'
    TabOrder = 0
    OnClick = btnRegisterClick
  end
  object grpStatus: TGroupBox
    Left = 8
    Top = 0
    Width = 289
    Height = 185
    Caption = 'Status'
    TabOrder = 1
    object bvlStatus: TBevel
      Left = 104
      Top = 24
      Width = 169
      Height = 153
    end
    object lblStatus: TLabel
      Left = 16
      Top = 48
      Width = 33
      Height = 13
      Caption = 'Status:'
    end
    object lblStatusDisp: TLabel
      Left = 112
      Top = 48
      Width = 3
      Height = 13
    end
    object lblDaysLeft: TLabel
      Left = 16
      Top = 64
      Width = 48
      Height = 13
      Caption = 'Days Left:'
    end
    object lblDaysLeftDisp: TLabel
      Left = 112
      Top = 64
      Width = 3
      Height = 13
    end
    object lblStartsLeftDisp: TLabel
      Left = 112
      Top = 80
      Width = 3
      Height = 13
    end
    object lblExpiryDateDisp: TLabel
      Left = 112
      Top = 120
      Width = 3
      Height = 13
    end
    object lblProtType: TLabel
      Left = 16
      Top = 32
      Width = 78
      Height = 13
      Caption = 'Protection Type:'
    end
    object lblProtTypeDisp: TLabel
      Left = 112
      Top = 32
      Width = 3
      Height = 13
    end
    object lblStartsLeft: TLabel
      Left = 16
      Top = 80
      Width = 51
      Height = 13
      Caption = 'Starts Left:'
    end
    object lblExpiryDate: TLabel
      Left = 16
      Top = 120
      Width = 57
      Height = 13
      Caption = 'Expiry Date:'
    end
    object lblRegisteredTo: TLabel
      Left = 16
      Top = 136
      Width = 70
      Height = 13
      Caption = 'Registered To:'
    end
    object lblRegisteredToDisp: TLabel
      Left = 112
      Top = 136
      Width = 3
      Height = 13
    end
    object lblChallengeString: TLabel
      Left = 16
      Top = 152
      Width = 80
      Height = 13
      Caption = 'Challenge String:'
    end
    object lblChallengeStringDisp: TLabel
      Left = 112
      Top = 152
      Width = 3
      Height = 13
    end
    object lblGraceStartsLeft: TLabel
      Left = 16
      Top = 96
      Width = 83
      Height = 13
      Caption = 'Grace Starts Left:'
    end
    object lblGraceStartsLeftDisp: TLabel
      Left = 112
      Top = 96
      Width = 3
      Height = 13
    end
  end
  object btnExit: TButton
    Left = 304
    Top = 160
    Width = 75
    Height = 25
    Caption = '&Exit'
    TabOrder = 2
    OnClick = btnExitClick
  end
  object btnDelete: TButton
    Left = 304
    Top = 40
    Width = 75
    Height = 25
    Caption = 'Delete'
    TabOrder = 3
    OnClick = btnDeleteClick
  end
  object Slock1: TSlock
    ChallengeString = 'EBE173C47800'
    DLLName = 'Lock.dll'
    EncryptionKey = '123123'
    ExpiryDate = 36072.000000000000000000
    GracePeriod = 5
    MachineOptions = [moWinRegOrg, moWinRegOwner, moExtensions]
    ProtectionOpt = [poBack]
    ProtectionType = ptStartCount
    Registered = False
    RegKeyMainRoot = CURRENT_USER
    RegKeyBackRoot = CLASSES_ROOT
    RegKeyMainPath = 'Test2'
    RegKeyBackPath = 'Test1'
    RegKeyMainKey = 'Test2'
    RegKeyBackKey = 'Test1'
    Status = stNotExpired
    TrialPeriod = 5
    OnClockMovedBack = Slock1ClockMovedBack
    OnExpired = Slock1Expired
    OnExtend = Slock1Extend
    OnFirstStart = Slock1FirstStart
    OnInGracePeriod = Slock1InGracePeriod
    OnRegInfoTamper = Slock1RegInfoTamper
    OnRegister = Slock1Register
    OnRegWriteErr = Slock1RegWriteErr
    OnRegInfoChanged = Slock1RegInfoChanged
    OnReminder = Slock1Reminder
    OnWrongUnlockCode = Slock1WrongUnlockCode
    OnTimedOut = Slock1TimedOut
    Left = 304
    Top = 96
  end
  object mnuMainMenu: TMainMenu
    Left = 336
    Top = 96
    object mnmFile: TMenuItem
      Caption = 'File'
      object mnpExit: TMenuItem
        Caption = 'Exit'
        OnClick = mnpExitClick
      end
    end
    object mnmFunction: TMenuItem
      Caption = 'Function'
      object mnpNormFunc: TMenuItem
        Caption = 'Normal Function'
        OnClick = mnpNormFuncClick
      end
    end
    object mnmRegister: TMenuItem
      Caption = 'Register'
      object mnpRegNow: TMenuItem
        Caption = 'Register Now'
        OnClick = mnpRegNowClick
      end
    end
  end
end